10 FOR C=0 TO 19:READA:POKE 49152+C,A:NEXTC
20 SYS 49152
30 DATA 169,147,32,210,255,169,0,141,17,208,141,32,208,141,33,205,76,22,64,96